The CICA Windows Explosion!

home *** CD-ROM | disk | FTP | other *** search

/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / demo / ed3demo.zip / ED.ZIP / CONFIG / LANG_CLI.XX_ / LANG_CLI.XX

Wrap

Text File | 1994-05-07 | 14KB | 1,217 lines

; Clipper Summer '87 Language Keywords for ED Color Syntax Highlighting ; Also S87 Templates ; Last change: 7 May 94 [Keywords] .f. .t. .and. .not. .or. accept all alternate append average begin bell blank box break call cancel case ccept century clear close color commit confirm console continue copy count create cursor date decimals declare default define delimiters device dir display do eject else elseif end endcase enddo endif epoch erase escape exact exclusive extended external file filter find fixed for form format from function get go if index input intensity join key keyboard label list local locate loop margin memory memvar menu message new next nil note on order otherwise pack path picture printer private procedure prompt public quit read recall reindex relation release rename replace report restore return run save say scoreboard screen sequence set shared skip softseek sort static store structure sum text to total type typeahead unique unlock update use wait while wrap zap ; [Types] Clipper S87 does not have types. ;---------------------------------- ; Clipper functions [User 1] aadd abs achoice aclone acopy adel adir aeval afields afill ains alert alias alltrim altd array asc ascan asize asort at atail bin2i bin2l bin2w bof browse cdow chr cmonth col ctod curdir date day dbappend dbclearfile dbclearindex dbclearrel dbcloseall dbclosearea dbcommit dbcommitall dbcreate dbcreateindex dbdelete dbedit dbeval dbf dbfilter dbgobottom dbgoto dbgotop dbrecall dbreindex dbrelation dbrselect dbseek dbselectarea dbsetdriver dbsetfilter dbsetindex dbsetorder dbsetrelation dbskip dbstruct dbunlock dbunlockall dbusearea delete deleted descend devout devpos directory diskspace dispbegin dispbox dispend dispout doserror dow dtoc dtos empty eof errorblock errorlevel eval exp fclose fcount fcreate ferase ferror field fieldblock fieldget fieldname fieldput fieldwblock file fklabel fkmax flock fopen found fread freadstr frename fseek fwrite getactive getenv hardcr header i2bin iif indexext indexkey indexord inkey int isalpha iscolor isdigit islower isprinter isupper l2bin lastkey lastrec left len log lower ltrim lupdate max maxcol maxrow memoedit memoline memoread memory memotran memowrit memvarblock min mlcount mlctopos mlpos mod month mpostolc neterr netname nextkey nosnow os outerr outstd pad padl padr pcol pcount procline procname prow qout rat readexit readinsert readkey readmodal readvar reccount recno recsize replicate restscreen right rlock round row rtrim savescreen scroll seconds select set setblink setcancel setcolor setcursor setkey setmode setpos space sqrt str strtran stuff substr time tone transform trim type updated upper used val valtype version with word year [User 2] aaverage activate active addzip afileread afilewrite alen alltrim alltrimlen althandle amacprint amax amaxn amaxstr amaxstrlen amaxstrn amin aminn aminstr aminstrlen aminstrn and areplicate argc argv arrayprint asciitoebc atest atestn atlast atnext atotal attoken beep bin2i bin2l bin2num bin2w bitstrip blanktext blinkbit border box boxchars byte2bin capfirst capitalize capslock capstext ccast center chdir checkdate checktime choiceret choice_ret chrcount chrfound chrswap clock12 clock24 cls clusters clustsize coldboot color comcheck comin cominit comma command comoff comon comout comreset comset comstat comswap cputype crash csrbot csroff csron csrput csrset csrtop curdir curdrive c_active c_afiler c_afilew c_amacpr c_aprint c_ccast c_comman c_diskto c_ferase c_flinec c_fload c_fstrco c_f_head c_f_isdb c_f_last c_f_lupd c_f_ndxk c_f_recs c_isinde c_movewi c_mx_cho c_mx_dbf c_mx_dir c_mx_fil c_mx_vie c_m_choi c_m_dbfv c_m_disp c_m_menu c_m_mess c_m_popd c_m_popf c_m_posi c_m_prom c_m_quer c_m_view c_scrtod c_sdfwri c_shadki c_squeak c_swap c_wordwr c_wpwrit c_wswrit datetype dbfarrfill dbfdisparr dbfdispbox dbfmove dbfmovebot dbfmovrite dbfreadarr dbfreadbac dbfreadfor dbfviewret dbfxret dec2hex decimals decrypt default delay delimiters delvolume disk disksize diskspace disktoscr dont_look_here dosmem dosvers drives drivestr drivetype dtow ebctoascii egamem encrypt enhanced execute exitkeys exit_keys expmem extmem fadvance fbof fbol fbot fchanged fclose fcopy fcopybyte fcreate fcreatef feof ferase feraseall ferror fgetattr fgetdate fgettime fhide filecount filesize findattr finddate finder findfirst findnext findsize findtime fkey fl3270 flavantgrd flbauhaus flbodoni flbroadway flcalligra flcomputer flcyrillic fldefine fldigital flen flgaramond flgreek flhebrew flinecount flitalic1 flitalic2 fllegend fload flocate floldeng flparkave flpercy flreset flromany flscript1 flscript2 fopen fprotect fre fread freadbyte freadint freadline freadlong freadstr frename freplicate frewind fseek fsetattr fsetdate fsettime fstrcount ftell ftop funhide funprotect fwrite fwritebyte fwriteint fwriteline fwritelong fwritesdf fwriteword fwritewp fwritews f_header f_isdbf f_lastrec f_lupdate f_ndxkey f_recsize getattr gete getmode getpage getvar getvolume handles header hellosteve hex2dec i2bin initscreen inp insert instext interrupt isalpha isascii isbutton iscntrl iscom iscursor isdigit isdir isdisk isdrive isems isextended isfile isfixed isfloppy ishandle isindex iskeyset islastday isleap islower islpt ismouse isnum isprint isprinter ispunct isqueue isrelease isspace isstate isupper isxdigit iszip kbdstat key keystat l2bin lastday lastdrive leadchar left ljust lowercase lprint lprintline lptreset lptset lptswap ltrimlen lupdate margin maxcol maxhandles maxrow mediatype mkdir mono montype mouse mousetrap movewin mxviewfill mx_choice mx_dbfview mx_popdir mx_popfile mx_view m_activate m_active m_aregion m_buttons m_choice m_clicks m_col m_csroff m_csron m_csrput m_cursor m_data m_datarest m_datasave m_dbfview m_display m_frame m_getpage m_hmickeys m_inbutton m_incol m_inrow m_iscursor m_maxcol m_maxrow m_menu m_message m_mickeys m_movement m_pen m_popdir m_popfile m_position m_prompt m_query m_region m_release m_reset m_restore m_row m_save m_setpage m_speed m_squeak m_stack m_stackget m_stacknew m_stacknum m_stackput m_title m_trapfeed m_trapfree m_trapget m_trapnew m_traprest m_trapsave m_trapset m_view m_vmickeys m_wait nap ndptype nexthandle nextkey nlen nstuff num2bin num2day num2month numgets numlock numtext numtoken nupper off ondo onkey or outp pad palette park path peek peekstr poke print prnhandle prnreset prnstatus program prtscr putkey q_cancel q_delete q_file q_hold q_restart q_status q_submit rand random readarray readarrdbf readback readbakdbf readfordbf readfore readh reads readscreen recsize reg_ah reg_al reg_ax reg_bh reg_bl reg_bp reg_bx reg_cf reg_ch reg_cl reg_cx reg_dh reg_di reg_dl reg_ds reg_dx reg_es reg_flags reg_si removeable restgets restscreen reverse right rjust rmdir rol roloc romdate ror savegets savescreen scancode scanlines scrlock scrltext scroll scrtodisk sectors sectorsize seed seg setattr setdate setdrive sethandles setkey setkeyrest setkeysave setlogical setmode setpage setscreen setsnow settime setvolume shift shl shr sizescreen sound soundex srand standard state statecode status stdin stdout stratnext strcenter strcount strexpand strextract strstuff stuff swap systype tabexpand test thanks timeh token tokenlen tokensize tone trailchar trimlen trimpunct turbo typeahead unclock12 unclock24 underline unselected untrim used vidtype viewback viewbott viewbox viewdisp viewfill viewfore viewmove viewright view_ret vreplicate waitkey warmboot wildcard xfinder xor xscancode xviewret [Preprocessor] else endif ifdef ifndef include define undef line error command translate xcommand xtranslate ; -------------------------------------------------- ; See "Template Creation" in the on line help and "Tool|Charts|ED Templates" ; for information on adding and modifying code templates. [Templates] ; Clipper keywords and statements #in #include \"\f.ch\" #d #define #e #endif\n #i #ifdef #u #undef @ @ \f, SAY @G @ \f, GET @S @ \f, SAY N NIL T TRUE F FALSE be begin sequence\n box/ /****\r60*\n*\r63 *\n\r64*/ ca do case\ncase \f\n\notherwise\n\nendcase\n com/ /* \f */ doc do case e else ei elseif enc endcase endc endcase ends end sequence\n f for \f\nnext\n fu function \f ( )\n\nreturn (.t.)\n ; rem hdr/ is used by proc & func templates hdr/ *\n* Name : \f\n$b* Does : \n$b* Parameters : \n$b* Returns : \n$b* Notes : \n*\n$b* Author : $i\n$b*Date Created : $d\n$b*Time Created : $t\n*\n if if \f\nendif\n lo local ot otherwise\n p private pr procedure \f\n\nreturn\n r return se sequence sep/ /**\r14*\n\r6*/\n\n st static wh while \f\nend\n ; Clipper S87 Functions ABS ABS(\fEXPN) ACH ACHOICE(\f^UX,^UY,^LX,^LY,ARRAY1) ACO ACOPY(\fARRAY1,ARRAY2,EXPN1,EXPN2,EXPN3) ADE ADEL(\fARRAY,EXPN) ADI ADIR(\fDIRECTORY SKELETON,ARRAY1,ARRAY2,ARRAY3,ARRAY4,ARRAY5) AFI AFIELDS(\fARRAY1,ARRAY2,ARRAY3,ARRAY4) AFL AFILL(\fARRAY,EXP,EXPN1,EXPN2) AIN AINS(\fEXPN) ALT ALLTRIM(\fEXPC) ALD ALTD(\fEXPN) ASC ASC(\fEXPC) ASN ASCAN(\fARRAY,EXP,EXPN1,EXPN2) ASO ASORT(\fARRAY,EXPN1,EXPN2) B2I BIN2I(\fEXPC) B2L BIN2L(\fEXPC) B2W BIN2W(\fEXPC) BOF BOF(\f) CDO CDOW(\fEXPD) CHR CHR(\fEXPN) CMO CMONTH(\fEXPD) COL COL(\f) CTO CTOD(\fEXPC) CUR CURDIR(\fEXPC) DAT DATE(\f) DAY DAY(\fEXPD) DBE DBEDIT(\f^UX,^UY,^LX,^LY,ARRAY1) DBF DBFILTER(\f) DBR DBRELATION(\fEXPN) DEL DELETED(\f) DES DESENDED(\fEXP) DIS DISKSPACE(\fEXPN) DOS DOSERROR(\f) DOW DOW(\fEXPD(\f) DTC DTOC(\fEXPD) DTS DTOS(\fEXPD) EMP EMPTY(\fEXP) EOF EOF(\f) ERR ERRORLEVEL(\fEXPN) EXP EXP(\fEXPN) FCL FCLOSE(\fEXPN) FCO FCOUNT(\f) FCR FCREATE(\fEXPC,EXPN) FER FERROR(\f) FIE FIELD(\fEXPN) FIL FILE(\fEXPC) FLO FLOCK(\f) FOP FOPEN(\fEXPC,EXPN) FOU FOUND(\f) FRE FREAD(\fEXPN1,@MEMVARC,EXPN2) FRS FREADSTR(\fEXPN1,EXPN2) FSE FSEEK(\fEXPN1,EXPN2,EXPN3) FWR FWRITE(\fEXPN1,EXPN2,EXPN3) GET GETE(\fEXPC) HAR HARDCR(\fEXPC) HEA HEADER(\f) I2B I2BIN(\fEXPN) IIF IIF(\fEXPL,EXP1,EXP2) INE INDEXEXT(\f) INK INDEXKEY(\fEXPN) INO INDEXORD(\f) INK INKEY(\fEXPN) INT INT(\fEXPN) ISA ISALPHA(\fEXPC) ISC ISCOLOR(\f) ISL ISLOWER(\fEXPC) ISP ISPRINTER(\f) ISU ISUPPER(\fEXPC) L2B L2BIN(\fEXPN) LAK LASTKEY(\f) LAR LASTREC(\f) LEF LEFT(\fEXPC,EXPN) LEN LEN(\fEXPC) LOG LOG(\fEXPN) LOW LOWER(\fEXPC) LTR LRTIM(\fEXPC) LUP LUPDATE(\f) MAX MAX(\fEXPN1,EXPD1,EXPL2,EXPD2) MEM MEMOEDIT(\fEXPC,^UX,^UY,^LX,^LY,EXPL) MML MEMOLINE(\fEXPC,EXPN1,EXPN2,EXPN3,EXPL) MMR MEMOREAD(\fEXPC) MMM MEMORY(\f) MMT MEMOTRAN(\fEXPC1,EXPC2,EXPC3) MMW MEMOWRIT(\fEXPC1,EXPC2) MIN MIN(\fEXPN1,EXPN2) MLC MLCOUNT(\fEXPC,EXPN1,EXPN2,EXPN3,EXPL) MLP MLPOS(\fEXPC,EXPN1,EXPN2,EXPN3,EXPL) MON MONTH(\fEXPD) NTE NETERR(\f) NTN NETNAME(\f) NEX NEXTKEY(\f) PCL PCOL(\f) PCO PCOUNT(\f) PRL PROCLINE(\f) PRN PROCNAME(\f) PRW PROW(\f) RAT RAT(\fEXPC1,EXPC2) RDE READEXIT(\fEXPL) RDI READINSERT(\fEXPL) RDV READVAR(\f) RCN RECNO(\f) RCS RECSIZE(\f) REP REPLICATE(\fEXPC,EXPN) RES RESTSCREEN(\fEXPN1,EXPN2,EXPN3,EXPN4,EXPC) RIG RIGHT(\fEXPC,EXPN) RLO RLOCK(\f) ROU ROUND(\fEXPN1,EXPN2) ROW ROW(\f) SVS SAVESCREEN(\fEXPN1,EXPN2,EXPN3,EXPN4) SCR SCROLL(\fEXPN1,EXPN2,EXPN3,EXPN4,EXPN5) SEC SECONDS(\f) SEL SELECT(\fEXPC) SCA SETCANCEL(\fEXPL) SCO SETCOLOR(\fEXPC) SPR SETPRC(\fEXPN1,EXPN2) SOU SOUNDEX(\fEXPC) SPA SPACE(\fEXPN) SQR SQRT(\fEXPN) STR STRTRAN(\fEXPC1,EXPC2,EXPC3,EXPN1,EXPN2) STU STUFF(\fEXPC1,EXPN1,EXPN2,EXPC2) SUB SUBSTR(\fEXPC,EXPN1,EXPN2) TIM TIME(\f) TON TONE(\fEXPN1,EXPN2) TRA TRANSFORM(\fEXP,EXPC) TRI TRIM(\fEXPC) TYP TYPE(\fEXPC) UPD UPDATED(\f) UPP UPPER(\fEXPC) USD USED(\f) VAL VAL(\fEXPC) WOR WORD(\fEXPN) YEA YEAR(\fEXPD) ; Clipper S87 Commands APF APPEND FROM APB APPEND BLANK ATO @ ^UX,^UY TO ^LX,^LY BOX @ ^UX,^UY,^LX,^LY BOX EXPC CLA CLEAR ALL CLG CLEAR GETS CLM CLEAR MEMORY CLT CLEAR TYPEAHEAD CLD CLOSE DATABASE CLI CLOSE INDEX COF COPY FILE COT COPY TO COS COPY STRUCTURE CSE COPY STRUCTURE EXTENDED TO DEC DECLARE DEF DELETE FILE DEL DELETE EXT EXTERNAL IND INDEX ON KEY KEYBOARD LBL LABEL FORM LOF LOCATE FOR MEN MENU TO PAR PARAMETERS PRI PRIVATE REC RECALL REL RELEASE REP REPLACE RET RETURN RFM REPORT FORM RIN REINDEX RFR RESTORE FROM RSC RESTORE SCREEN SSC SAVE SCREEN SVT SAVE TO TTL TOTAL ON UNL UNLOCK UPD UPDATE ON ; Clipper S87 SET commands SALT SET SET ALTERNATE SBEL SET BELL SCEN SET CENTURY SCOL SET COLOR TO SCON SET CONSOLE SCUR SET CURSOR SDEC SET DECIMALS TO SDEF SET DEFAULT TO SDEL SET DELETED SDEV SET DEVICE TO SESC SET ESCAPE SEXA SET EXACT SEXC SET EXCLUSIVE SFIL SET FILTER TO SFOR SET FORMAT TO SFUN SET FUNCTION SIND SET INDEX TO SINT SET INTENSITY SKEY SET KEY SMAR SET MARGIN TO SORD SET ORDER TO SPAT SET PATH TO SPRI SET PRINT SPRN SET PRINTER TO SPRO SET PROCEDURE TO SREL SET RELATION TO SSCO SET SCOREBOARD SSOF SET SOFTSEEK STYP SET TYPEAHEAD TO SUNI SET UNIQUE SWRA SET WRAP ;##- eof -##